'   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '       K E Y B O A R D   J O G   T E S T E R 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 O p t i o n   G l o b a l K e y s   E n a b l e d 
 
 O p t i o n   S p e e d   9 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   S o f t w a r e   l i m i t s 
 
 X m a x   =     1 0 0 
 
 X m i n   =         0 
 
 Y m a x   =     1 0 0 
 
 Y m i n   =         0 
 
 Z m a x   =     1 0 0 
 
 Z m i n   =         0 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   S l o t s 
 
 S l o t _ X   =   1 
 
 S l o t _ Y   =   3 
 
 S l o t _ Z   =   5 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   B U T T O N S 
 
 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   K E Y S 
 
 K e y   R i g h t 	 	 G o s u b   E x e c K e y s 
 
 K e y   L e f t   	 	 G o s u b   E x e c K e y s 
 
 K e y   U p   	 	 	 G o s u b   E x e c K e y s 
 
 K e y   D o w n   	 	 G o s u b   E x e c K e y s 
 
 K e y   P a g e u p 	 	 G o s u b   E x e c K e y s 
 
 K e y   P a g e d o w n 	 G o s u b   E x e c K e y s 
 
 
 
 S t o p 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     V A R I A B L E S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 V a r i a b l e   N u m e r i c   S l o t _ X 
 
 V a r i a b l e   N u m e r i c   S l o t _ Y 
 
 V a r i a b l e   N u m e r i c   S l o t _ Z 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   S O F T W A R E   L I M I T S 
 
 V a r i a b l e   N u m e r i c   X m a x 
 
 V a r i a b l e   N u m e r i c   X m i n 
 
 V a r i a b l e   N u m e r i c   Y m a x 
 
 V a r i a b l e   N u m e r i c   Y m i n 
 
 V a r i a b l e   N u m e r i c   Z m a x 
 
 V a r i a b l e   N u m e r i c   Z m i n 
 
 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     J O G   w i t h   k e y b o a r d 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   E x e c K e y s 
 
 	 G o s u b   S p e e d M o d i f i e r s 
 
 	 ' 
 
 	 I f   K e y ( " R i g h t " ) 
 
 	 	 S l o t   S l o t _ X   =   L i m i t ( S l o t ( S l o t _ X )   +   J o g S p e e d ,   X m i n ,   X m a x ) 
 
 	 E n d I f 
 
 	 I f   K e y ( " L e f t " ) 
 
 	 	 S l o t   S l o t _ X   =   L i m i t ( S l o t ( S l o t _ X )   -   J o g S p e e d ,   X m i n ,   X m a x ) 
 
 	 E n d I f 
 
 	 ' 
 
 	 I f   K e y ( " U p " ) 
 
 	 	 S l o t   S l o t _ Y   =   L i m i t ( S l o t ( S l o t _ Y )   +   J o g S p e e d ,   Y m i n ,   Y m a x ) 
 
 	 E n d I f 
 
 	 I f   K e y ( " D o w n " ) 
 
 	 	 S l o t   S l o t _ Y   =   L i m i t ( S l o t ( S l o t _ Y )   -   J o g S p e e d ,   Y m i n ,   Y m a x ) 
 
 	 E n d I f 
 
 	 ' 
 
 	 I f   K e y ( " P a g e U p " ) 
 
 	 	 S l o t   S l o t _ Z   =   L i m i t ( S l o t ( S l o t _ Z )   +   J o g S p e e d ,   Z m i n ,   Z m a x ) 
 
 	 E n d I f 
 
 	 I f   K e y ( " P a g e D o w n " ) 
 
 	 	 S l o t   S l o t _ Z   =   L i m i t ( S l o t ( S l o t _ Z )   -   J o g S p e e d ,   Z m i n ,   Z m a x ) 
 
 	 E n d I f 
 
 	 ' 
 
 	 G o s u b   P r i n t V a l u e s 
 
 R e t u r n 
 
 
 
 L a b e l   S p e e d M o d i f i e r s 
 
 	 V a r i a b l e   N u m e r i c   J o g S p e e d 
 
 	 J o g S p e e d   =   1 
 
 	 S e l e c t   T r u e 
 
 	 	 C a s e   K e y ( " S H I F T " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 1 
 
 	 	 C a s e   K e y ( " C T R L " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 0 1 
 
 	 	 C a s e   K e y ( " A L T " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 0 0 1 
 
 	 E n d S e l e c t 
 
 R e t u r n 
 
 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     P R I N T   C O O R D I N A T E S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   P r i n t V a l u e s 
 
 	 s 1   =               " X = "   +   F o r m a t ( S l o t ( S l o t _ X ) ,   " 0 . 0 0 0 " ) 
 
 	 s 1   =   s 1   +   "   Y = "   +   F o r m a t ( S l o t ( S l o t _ Y ) ,   " 0 . 0 0 0 " ) 
 
 	 s 1   =   s 1   +   "   Z = "   +   F o r m a t ( S l o t ( S l o t _ Z ) ,   " 0 . 0 0 0 " ) 
 
 	 P r i n t   C R L F   +   s 1 
 
 R e t u r n 
 
 
 
 
 
 
 
 
 
 ' W A T C H   S l o t M o t o r 
 
 ' W A T C H   A b s ( S l o t ( S l o t M o t o r ) ) 
 
 ' W A T C H   v 1 
 
 ' W A T C H   L o a d 
 
 ' E X E C   S i n 2   =   S i n ( 3 3 ) 
 
 